home *** CD-ROM | disk | FTP | other *** search
/ Merciful 5 / Merciful - Disc 5.iso / software / p / pcqpascalv1.2d.lha / Include / Exec / Alerts.i next >
Encoding:
Text File  |  1997-05-06  |  10.4 KB  |  309 lines
  1.  
  2. {
  3.         exec/alerts.i
  4. }
  5.  
  6. { ********************************************************************
  7. *
  8. *  Format of the alert error number:
  9. *
  10. *    +-+-------------+----------------+--------------------------------+
  11. *    |D|  SubSysId   |  General Error |    SubSystem Specific Error    |
  12. *    +-+-------------+----------------+--------------------------------+
  13. *     1    7 bits          8 bits                  16 bits
  14. *
  15. *                    D:  DeadEnd alert
  16. *             SubSysId:  indicates ROM subsystem number.
  17. *        General Error:  roughly indicates what the error was
  18. *       Specific Error:  indicates more detail
  19. *********************************************************************}
  20.  
  21. const
  22. {*********************************************************************
  23. *
  24. *  Hardware/CPU specific alerts:  They may show without the 8 at the
  25. *  front of the number.  These are CPU/68000 specific.  See 68$0
  26. *  programmer's manuals for more details.
  27. *
  28. *********************************************************************}
  29.     ACPU_BusErr     = $80000002;      { Hardware bus fault/access error }
  30.     ACPU_AddressErr = $80000003;      { Illegal address access (ie: odd) }
  31.     ACPU_InstErr    = $80000004;      { Illegal instruction }
  32.     ACPU_DivZero    = $80000005;      { Divide by zero }
  33.     ACPU_CHK        = $80000006;      { Check instruction error }
  34.     ACPU_TRAPV      = $80000007;      { TrapV instruction error }
  35.     ACPU_PrivErr    = $80000008;      { Privilege violation error }
  36.     ACPU_Trace      = $80000009;      { Trace error }
  37.     ACPU_LineA      = $8000000A;      { Line 1010 Emulator error }
  38.     ACPU_LineF      = $8000000B;      { Line 1111 Emulator error }
  39.     ACPU_Format     = $8000000E;      { Stack frame format error }
  40.     ACPU_Spurious   = $80000018;      { Spurious interrupt error }
  41.     ACPU_AutoVec1   = $80000019;      { AutoVector Level 1 interrupt error }
  42.     ACPU_AutoVec2   = $8000001A;      { AutoVector Level 2 interrupt error }
  43.     ACPU_AutoVec3   = $8000001B;      { AutoVector Level 3 interrupt error }
  44.     ACPU_AutoVec4   = $8000001C;      { AutoVector Level 4 interrupt error }
  45.     ACPU_AutoVec5   = $8000001D;      { AutoVector Level 5 interrupt error }
  46.     ACPU_AutoVec6   = $8000001E;      { AutoVector Level 6 interrupt error }
  47.     ACPU_AutoVec7   = $8000001F;      { AutoVector Level 7 interrupt error }
  48.  
  49.  
  50. { ********************************************************************
  51. *
  52. *  General Alerts
  53. *
  54. *  For example: timer.device cannot open math.library would be $05038015
  55. *
  56. *       Alert(AN_TimerDev|AG_OpenLib|AO_MathLib);
  57. *
  58. ********************************************************************}
  59.  
  60.  
  61. CONST
  62.  
  63. { ------ alert types }
  64.   AT_DeadEnd    = $80000000;
  65.   AT_Recovery   = $00000000;
  66.  
  67.  
  68. { ------ general purpose alert codes }
  69.   AG_NoMemory   = $00010000;
  70.   AG_MakeLib    = $00020000;
  71.   AG_OpenLib    = $00030000;
  72.   AG_OpenDev    = $00040000;
  73.   AG_OpenRes    = $00050000;
  74.   AG_IOError    = $00060000;
  75.   AG_NoSignal   = $00070000;
  76.   AG_BadParm    = $00080000;
  77.   AG_CloseLib   = $00090000;    { usually too many closes }
  78.   AG_CloseDev   = $000A0000;    { or a mismatched close }
  79.   AG_ProcCreate = $000B0000;    { Process creation failed }
  80.  
  81.  
  82. { ------ alert objects: }
  83.   AO_ExecLib      = $00008001;
  84.   AO_GraphicsLib  = $00008002;
  85.   AO_LayersLib    = $00008003;
  86.   AO_Intuition    = $00008004;
  87.   AO_MathLib      = $00008005;
  88.   AO_DOSLib       = $00008007;
  89.   AO_RAMLib       = $00008008;
  90.   AO_IconLib      = $00008009;
  91.   AO_ExpansionLib = $0000800A;
  92.   AO_DiskfontLib  = $0000800B;
  93.   AO_UtilityLib   = $0000800C;
  94.   AO_KeyMapLib    = $0000800D;
  95.  
  96.   AO_AudioDev     = $00008010;
  97.   AO_ConsoleDev   = $00008011;
  98.   AO_GamePortDev  = $00008012;
  99.   AO_KeyboardDev  = $00008013;
  100.   AO_TrackDiskDev = $00008014;
  101.   AO_TimerDev     = $00008015;
  102.  
  103.   AO_CIARsrc    = $00008020;
  104.   AO_DiskRsrc   = $00008021;
  105.   AO_MiscRsrc   = $00008022;
  106.  
  107.   AO_BootStrap  = $00008030;
  108.   AO_Workbench  = $00008031;
  109.   AO_DiskCopy   = $00008032;
  110.   AO_GadTools   = $00008033;
  111.   AO_Unknown    = $00008035;
  112.  
  113.  
  114.  
  115. { ********************************************************************
  116. *
  117. *   Specific Alerts:
  118. *
  119. ********************************************************************}
  120.  
  121. { ------ exec.library }
  122.  
  123.   AN_ExecLib    = $01000000;
  124.   AN_ExcptVect  = $01000001; {  68000 exception vector checksum (obs.) }
  125.   AN_BaseChkSum = $01000002; {  Execbase checksum (obs.) }
  126.   AN_LibChkSum  = $01000003; {  Library checksum failure }
  127.  
  128.   AN_MemCorrupt = $81000005; {  Corrupt memory list detected in FreeMem }
  129.   AN_IntrMem    = $81000006; {  No memory for interrupt servers }
  130.   AN_InitAPtr   = $01000007; {  InitStruct() of an APTR source (obs.) }
  131.   AN_SemCorrupt = $01000008; {  A semaphore is in an illegal state
  132.                                       at ReleaseSempahore() }
  133.   AN_FreeTwice    = $01000009; {  Freeing memory already freed }
  134.   AN_BogusExcpt   = $8100000A; {  illegal 68k exception taken (obs.) }
  135.   AN_IOUsedTwice  = $0100000B; {  Attempt to reuse active IORequest }
  136.   AN_MemoryInsane = $0100000C; {  Sanity check on memory list failed
  137.                                       during AvailMem(MEMF_LARGEST) }
  138.   AN_IOAfterClose = $0100000D; {  IO attempted on closed IORequest }
  139.   AN_StackProbe   = $0100000E; {  Stack appears to extend out of range }
  140.   AN_BadFreeAddr  = $0100000F; {  Memory header not located. [ Usually an
  141.                                   invalid address passed to FreeMem() ] }
  142.   AN_BadSemaphore = $01000010; { An attempt was made to use the old
  143.                                       message semaphores. }
  144.  
  145. { ------ graphics.library }
  146.  
  147.   AN_GraphicsLib  = $02000000;
  148.   AN_GfxNoMem     = $82010000;  {  graphics out of memory }
  149.   AN_GfxNoMemMspc = $82010001;  {  MonitorSpec alloc, no memory }
  150.   AN_LongFrame    = $82010006;  {  long frame, no memory }
  151.   AN_ShortFrame   = $82010007;  {  short frame, no memory }
  152.   AN_TextTmpRas   = $02010009;  {  text, no memory for TmpRas }
  153.   AN_BltBitMap    = $8201000A;  {  BltBitMap, no memory }
  154.   AN_RegionMemory = $8201000B;  {  regions, memory not available }
  155.   AN_MakeVPort    = $82010030;  {  MakeVPort, no memory }
  156.   AN_GfxNewError  = $0200000C;
  157.   AN_GfxFreeError = $0200000D;
  158.  
  159.   AN_GfxNoLCM     = $82011234;  {  emergency memory not available }
  160.  
  161.   AN_ObsoleteFont = $02000401;  {  unsupported font description used }
  162.  
  163. { ------ layers.library }
  164.  
  165.   AN_LayersLib    = $03000000;
  166.   AN_LayersNoMem  = $83010000;  {  layers out of memory }
  167.  
  168. { ------ intuition.library }
  169.   AN_Intuition    = $04000000;
  170.   AN_GadgetType   = $84000001;  {  unknown gadget type }
  171.   AN_BadGadget    = $04000001;  {  Recovery form of AN_GadgetType }
  172.   AN_CreatePort   = $84010002;  {  create port, no memory }
  173.   AN_ItemAlloc    = $04010003;  {  item plane alloc, no memory }
  174.   AN_SubAlloc     = $04010004;  {  sub alloc, no memory }
  175.   AN_PlaneAlloc   = $84010005;  {  plane alloc, no memory }
  176.   AN_ItemBoxTop   = $84000006;  {  item box top < RelZero }
  177.   AN_OpenScreen   = $84010007;  {  open screen, no memory }
  178.   AN_OpenScrnRast = $84010008;  {  open screen, raster alloc, no memory }
  179.   AN_SysScrnType  = $84000009;  {  open sys screen, unknown type }
  180.   AN_AddSWGadget  = $8401000A;  {  add SW gadgets, no memory }
  181.   AN_OpenWindow   = $8401000B;  {  open window, no memory }
  182.   AN_BadState     = $8400000C;  {  Bad State Return entering Intuition }
  183.   AN_BadMessage   = $8400000D;  {  Bad Message received by IDCMP }
  184.   AN_WeirdEcho    = $8400000E;  {  Weird echo causing incomprehension }
  185.   AN_NoConsole    = $8400000F;  {  couldn't open the Console Device }
  186.   AN_NoISem       = $04000010;  { Intuition skipped obtaining a sem }
  187.   AN_ISemOrder    = $04000011;  { Intuition obtained a sem in bad order }
  188.  
  189. { ------ math.library }
  190.  
  191.   AN_MathLib      = $05000000;
  192.  
  193. { ------ dos.library }
  194.  
  195.   AN_DOSLib       = $07000000;
  196.   AN_StartMem     = $07010001; {  no memory at startup }
  197.   AN_EndTask      = $07000002; {  EndTask didn't }
  198.   AN_QPktFail     = $07000003; {  Qpkt failure }
  199.   AN_AsyncPkt     = $07000004; {  Unexpected packet received }
  200.   AN_FreeVec      = $07000005; {  Freevec failed }
  201.   AN_DiskBlkSeq   = $07000006; {  Disk block sequence error }
  202.   AN_BitMap       = $07000007; {  Bitmap corrupt }
  203.   AN_KeyFree      = $07000008; {  Key already free }
  204.   AN_BadChkSum    = $07000009; {  Invalid checksum }
  205.   AN_DiskError    = $0700000A; {  Disk Error }
  206.   AN_KeyRange     = $0700000B; {  Key out of range }
  207.   AN_BadOverlay   = $0700000C; {  Bad overlay }
  208.   AN_BadInitFunc  = $0700000D; {  Invalid init packet for cli/shell }
  209.   AN_FileReclosed = $0700000E; {  A filehandle was closed more than once }
  210.  
  211. { ------ ramlib.library }
  212.  
  213.   AN_RAMLib       = $08000000;
  214.   AN_BadSegList   = $08000001;  {  no overlays in library seglists }
  215.  
  216. { ------ icon.library }
  217.  
  218.   AN_IconLib      = $09000000;
  219.  
  220. { ------ expansion.library }
  221.  
  222.   AN_ExpansionLib       = $0A000000;
  223.   AN_BadExpansionFree   = $0A000001; {  freeed free region }
  224.  
  225. { ------ diskfont.library }
  226.  
  227.   AN_DiskfontLib        = $0B000000;
  228.  
  229. { ------ audio.device }
  230.  
  231.   AN_AudioDev   = $10000000;
  232.  
  233. { ------ console.device }
  234.  
  235.   AN_ConsoleDev = $11000000;
  236.   AN_NoWindow   = $11000001;    {  Console can't open initial window }
  237.  
  238. { ------ gameport.device }
  239.  
  240.   AN_GamePortDev        = $12000000;
  241.  
  242. { ------ keyboard.device }
  243.  
  244.   AN_KeyboardDev        = $13000000;
  245.  
  246. { ------ trackdisk.device }
  247.  
  248.   AN_TrackDiskDev = $14000000;
  249.   AN_TDCalibSeek  = $14000001;  {  calibrate: seek error }
  250.   AN_TDDelay      = $14000002;  {  delay: error on timer wait }
  251.  
  252. { ------ timer.device }
  253.  
  254.   AN_TimerDev     = $15000000;
  255.   AN_TMBadReq     = $15000001; {  bad request }
  256.   AN_TMBadSupply  = $15000002; {  power supply -- no 50/60Hz ticks }
  257.  
  258. { ------ cia.resource }
  259.  
  260.   AN_CIARsrc      = $20000000;
  261.  
  262. { ------ disk.resource }
  263.  
  264.   AN_DiskRsrc   = $21000000;
  265.   AN_DRHasDisk  = $21000001;    {  get unit: already has disk }
  266.   AN_DRIntNoAct = $21000002;    {  interrupt: no active unit }
  267.  
  268. { ------ misc.resource }
  269.  
  270.   AN_MiscRsrc   = $22000000;
  271.  
  272. { ------ bootstrap }
  273.  
  274.   AN_BootStrap  = $30000000;
  275.   AN_BootError  = $30000001;    {  boot code returned an error }
  276.  
  277. { ------ Workbench }
  278.  
  279.   AN_Workbench          = $31000000;
  280.   AN_NoFonts            = $B1000001;
  281.   AN_WBBadStartupMsg1   = $31000001;
  282.   AN_WBBadStartupMsg2   = $31000002;
  283.   AN_WBBadIOMsg         = $31000003;
  284.  
  285.   AN_WBReLayoutToolMenu          = $B1010009;
  286.  
  287. { ------ DiskCopy }
  288.  
  289.   AN_DiskCopy   = $32000000;
  290.  
  291. { ------ toolkit for Intuition }
  292.  
  293.   AN_GadTools   = $33000000;
  294.  
  295. { ------ System utility library }
  296.  
  297.   AN_UtilityLib = $34000000;
  298.  
  299. { ------ For use by any application that needs it }
  300.  
  301.   AN_Unknown    = $35000000;
  302.  
  303.  
  304.  
  305. Procedure Alert(alertNum : Integer; parameters : Address);
  306.     External;
  307.  
  308.  
  309.